COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	PRECEDE
C00003 ENDMK
C⊗;
PRECEDE;
ARRAY F2,F3,F4(512);
SEG(F2);0 1 1 10 1 100;
SEG(F3);1 1 1 100;
SEG(F4);1 1 1 90 0 100;
INSTRUMENT TOOT;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);<P6 IS TONE COLOR FOR 'TOOT'
OUTA←OUTA+U2;
END;
*
TOOT 0 4;
P2 .2;
P3 C4;
P4 1000;
P5 FUN/2/3///4;
P6 F1;
RD .06;
END;